تم تصميم الدالة KEBABCASE() لدمج الكلمات باستخدام واصلة، أي يتم إرجاع كلمة واحدة كنتيجة، على سبيل المثال.
Kebab Case يقسم سلسلة من الكلمات المفصولة بمسافات أو واصلات أو شرطات سفلية أو تغييرات في حالة الأحرف، ثم يحول تلك الكلمات إلى أحرف صغيرة ويربطها بفاصل واصلة ("-").
يمكن أن تكون الدالة KEBABCASE() مفيدة في البرمجة لتحويل أسماء المتغيرات وفقًا لاتفاقيات كتابة التعليمات البرمجية المقبولة
إليك رمز الماكرو لإنشاء وظيفة مخصصة يمكنها تحويل النص إلى كلمات فردية مفصولة بواصلات (Kebab Case) في LibreOffice Calc.
افتح القائمة Tools - Macros - Edit Macros...، وحدد Module1 وانسخ النص التالي إلى الوحدة:
Function KebabCase(ByVal str As String) As String 'moonexcel.com.ua Dim words As Variant Dim FCalc As Object FCalc = CreateUnoService("com.sun.star.sheet.FunctionAccess") str = Replace(str,"-"," ") str = Replace(str,"_"," ") str = FCalc.callFunction("TRIM", Array(str)) str = FCalc.callFunction("REGEX", Array(str,"([:lower:])([:upper:])","$1 $2","g")) str = LCase(str) words = Split(str," ") KebabCase = Join(words,"-") End Function
ثم أغلق Macro Editor، وارجع إلى LibreOffice Calc واستخدم وظيفتنا الجديدة في أي خلية.
يمكنك أيضًا استخدام الميزة KEBABCASE() عن طريق تثبيت الامتداد المجاني YouLibreCalc.oxt أو نسخته كاملة المواصفات YLC_Utilities.oxt .
بعد ذلك ستكون هذه الوظيفة متاحة في كافة الملفات التي سيتم فتحها في LibreOffice Calc.